algoritmo iniciar sesion en pseint